Public Function New( _
   ByVal collection As IEnumerable(Of IDisposable) _
)

public DisposingList( 
   IEnumerable<IDisposable> collection
)

disposeOrder.Clear();
DisposingList list = new DisposingList();

DisposeInOrder a = new DisposeInOrder();
DisposeInOrder b = new DisposeInOrder();

list.Add(a);
list.Add(b);
list.Add(null);
list.Dispose();

//Removed from list?
Assert.AreEqual(0, list.Count);
//All were disposed?
Assert.AreEqual(2, disposeOrder.Count);
//Disposed in reverse order of creation?
Assert.IsTrue(object.ReferenceEquals(b, disposeOrder[0]));
Assert.IsTrue(object.ReferenceEquals(a, disposeOrder[1]));

Assert.AreEqual(2, new DisposingList(new IDisposable[] { a, b }).Count);
Assert.AreEqual(0, new DisposingList(5).Count);

disposeOrder.Clear()
Dim list As New DisposingList()

Dim a As New DisposeInOrder()
Dim b As New DisposeInOrder()

list.Add(a)
list.Add(b)
list.Add(Nothing)
list.Dispose()

'Removed from list?
Assert.AreEqual(0, list.Count)
'All were disposed?
Assert.AreEqual(2, disposeOrder.Count)
'Disposed in reverse order of creation?
Assert.IsTrue(Object.ReferenceEquals(b, disposeOrder(0)))
Assert.IsTrue(Object.ReferenceEquals(a, disposeOrder(1)))

Assert.AreEqual(2, New DisposingList(New IDisposable() {a, b}).Count)
Assert.AreEqual(0, New DisposingList(5).Count)